inherited FrmModeloCartaImp: TFrmModeloCartaImp
  Left = 180
  Top = 229
  ActiveControl = txtCodigo
  Caption = 'Relat'#243'rio de Modelo de Carta'
  ClientHeight = 77
  ClientWidth = 365
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel [0]
    Left = 4
    Top = 3
    Width = 78
    Height = 13
    Caption = 'Modelo de Carta'
  end
  inherited JvFooter1: TJvFooter
    Top = 40
    Width = 365
    inherited btnImprimir: TJvFooterBtn
      Left = 205
      OnClick = btnImprimirClick
    end
    inherited btnFechar: TJvFooterBtn
      Left = 283
    end
  end
  object txtCodigo: TEditEnh [2]
    Left = 4
    Top = 17
    Width = 95
    Height = 19
    Text = '0'
    Alignment = taRightJustify
    Button.Key1 = 'F12'
    Button.Style = eebEllipsis
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 0
    EditMaskEx = '::NM::!9999999990;0;0;0'
  end
  object txtNome: TEditEnh [3]
    Left = 101
    Top = 17
    Width = 260
    Height = 19
    TabStop = False
    ReadOnly = True
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    Color = clBtnFace
  end
  object txtCampos: TMemo [4]
    Left = 160
    Top = 4
    Width = 79
    Height = 17
    Lines.Strings = (
      'DATACURTA-'
      'DATA ATUAL '
      'CURTA'
      'DATALONGA-'
      'DATA ATUAL '
      'LONGA'
      'HORACURTA-'
      'HORA ATUAL '
      'CURTA'
      'HORALONGA-'
      'HORA ATUAL '
      'LONGA'
      'DIAATUAL-'
      'DIA ATUAL '
      'MESATUAL-'
      'M'#202'S ATUAL'
      'ANOATUAL-'
      'ANO ATUAL')
    TabOrder = 3
    Visible = False
  end
  inherited frxReport: TfrxReport
    Datasets = <
      item
        DataSet = DBDataset
        DataSetName = 'DBDataset'
      end>
    Variables = <
      item
        Name = ' Interna'
        Value = Null
      end
      item
        Name = 'Rel_Usuario'
        Value = Null
      end
      item
        Name = 'Rel_Titulo'
        Value = Null
      end
      item
        Name = 'Rel_SubTitulo'
        Value = Null
      end
      item
        Name = 'Rel_Empresa_Nome'
        Value = Null
      end
      item
        Name = 'Rel_Empresa_Imagem'
        Value = Null
      end
      item
        Name = 'Rel_Empresa'
        Value = Null
      end
      item
        Name = 'Rel_ID'
        Value = Null
      end>
    Style = <>
    inherited Relatorio: TfrxReportPage
      inherited Cabecalho: TfrxPageHeader
        inherited Rel_Usuario: TfrxMemoView
          Top = 3.779530000000000000
          Visible = False
          Memo.UTF8 = (
            '[Rel_Usuario]')
        end
        inherited Rel_Data: TfrxMemoView
          Visible = False
          Memo.UTF8 = (
            '[<Date>] [<Time>]')
        end
        inherited Line5: TfrxLineView
          Visible = False
        end
        inherited Rel_Empresa_Imagem: TfrxPictureView
          Top = 3.779530000000000000
        end
        inherited Rel_Empresa_Nome: TfrxMemoView
          Top = 3.779530000000000000
          Memo.UTF8 = (
            '[Rel_Empresa_Nome]')
        end
        inherited Pagina: TfrxMemoView
          Visible = False
          Memo.UTF8 = (
            'P'#195#129'G.: [PAGE#] de [TOTALPAGES#]')
        end
        object Memo1: TfrxMemoView
          Left = 151.181200000000000000
          Top = 22.677180000000000000
          Width = 449.764070000000000000
          Height = 15.118120000000000000
          ShowHint = False
          StretchMode = smActualHeight
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          HAlign = haCenter
          Memo.UTF8 = (
            '[Rel_Titulo]')
          ParentFont = False
        end
      end
      inherited Rodape: TfrxPageFooter
        Top = 215.433210000000000000
        inherited Rel_Empresa: TfrxMemoView
          Memo.UTF8 = (
            '[Rel_Empresa]')
        end
      end
      object MasterData2: TfrxMasterData
        Height = 15.118120000000000000
        Top = 139.842610000000000000
        Width = 718.110700000000000000
        DataSet = DBDataset
        DataSetName = 'DBDataset'
        RowCount = 0
        StartNewPage = True
        Stretched = True
        object Memo2: TfrxMemoView
          Width = 718.110700000000000000
          Height = 15.118120000000000000
          ShowHint = False
          StretchMode = smActualHeight
          Memo.UTF8 = (
            '[DBDataset."TEXTO"]')
        end
      end
    end
  end
  object MemCampos: TClientDataSet
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'Descricao'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'Nome'
        DataType = ftString
        Size = 30
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 120
    Top = 1
    Data = {
      510000009619E0BD010000001800000002000000000003000000510009446573
      63726963616F0100490000000100055749445448020002003200044E6F6D6501
      00490000000100055749445448020002001E000000}
    object MemCamposDescricao: TStringField
      FieldName = 'Descricao'
      Size = 50
    end
    object MemCamposNome: TStringField
      FieldName = 'Nome'
      Size = 30
    end
  end
  object Mem: TClientDataSet
    Active = True
    Aggregates = <>
    FieldDefs = <
      item
        Name = 'Texto'
        DataType = ftBlob
      end>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 261
    Data = {
      3D0000009619E0BD0100000018000000010000000000030000003D0005546578
      746F04004B0000000100075355425459504502004900070042696E6172790000
      00}
    object MemTexto: TBlobField
      FieldName = 'Texto'
    end
  end
end
